"dewpoint" <-
structure(list(maxtemp = c(18, 18, 20, 20, 20, 20, 22, 22, 22, 
22, 22, 24, 24, 24, 24, 24, 24, 26, 26, 26, 26, 26, 26, 28, 28, 
28, 28, 28, 28, 28, 28, 30, 30, 30, 30, 30, 30, 30, 30, 32, 32, 
32, 32, 32, 32, 32, 32, 34, 34, 34, 34, 34, 34, 34, 36, 36, 36, 
36, 36, 36, 36, 38, 38, 38, 38, 38, 38, 40, 40, 40, 40, 40), 
    mintemp = c(8, 10, 6, 8, 10, 12, 8, 10, 12, 14, 16, 8, 10, 
    12, 14, 16, 18, 10, 12, 14, 16, 18, 20, 10, 12, 14, 16, 18, 
    20, 22, 24, 12, 14, 16, 18, 20, 22, 24, 26, 12, 14, 16, 18, 
    20, 22, 24, 26, 14, 16, 18, 20, 22, 24, 26, 14, 16, 18, 20, 
    22, 24, 26, 16, 18, 20, 22, 24, 26, 18, 20, 22, 24, 26), 
    dewpoint = c(7, 10, 5, 7, 9, 12, 6, 9, 11, 14, 16, 5, 8, 
    10, 13, 15, 18, 7, 9, 12, 14, 17, 20, 5, 8, 11, 13, 16, 19, 
    22, 24, 7, 9, 12, 14, 18, 20, 23, 26, 5, 8, 11, 13, 16, 19, 
    22, 25, 6, 9, 12, 15, 18, 21, 25, 5, 7, 10, 13, 16, 19, 22, 
    5, 7, 10, 13, 17, 20, 5, 8, 11, 14, 17)), .Names = c("maxtemp", 
"mintemp", "dewpoint"), class = "data.frame", row.names = c("1", 
"2", "3", "4", "5", "6", "7", "8", "9", "10", "11", "12", "13", 
"14", "15", "16", "17", "18", "19", "20", "21", "22", "23", "24", 
"25", "26", "27", "28", "29", "30", "31", "32", "33", "34", "35", 
"36", "37", "38", "39", "40", "41", "42", "43", "44", "45", "46", 
"47", "48", "49", "50", "51", "52", "53", "54", "55", "56", "57", 
"58", "59", "60", "61", "62", "63", "64", "65", "66", "67", "68", 
"69", "70", "71", "72"))
